/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / BARNET / ACORNET / OLD-VERSIONS / ACORNET020 / !Acornet_AppLib_tcpipuser

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 00 0a 0f f4 3e 74 63 | 70 69 70 75 73 65 72 0d |.....>tc|pipuser.|
|00000010| 00 14 04 0d 00 1e 15 dd | 20 a4 74 63 70 69 70 75 |........| .tcpipu|
|00000020| 73 65 72 5f 69 6e 69 74 | 0d 00 28 06 3d 30 0d 00 |ser_init|..(.=0..|
|00000030| 32 04 0d 00 3c 2a dd 20 | a4 74 63 70 69 70 75 73 |2...<*. |.tcpipus|
|00000040| 65 72 5f 6d 65 74 68 6f | 64 28 6d 65 74 68 6f 64 |er_metho|d(method|
|00000050| 24 2c 61 72 67 24 2c 6f | 70 74 24 29 0d 00 50 10 |$,arg$,o|pt$)..P.|
|00000060| c8 8e 20 6d 65 74 68 6f | 64 24 20 ca 0d 00 5a 29 |.. metho|d$ ...Z)|
|00000070| c9 20 22 63 6f 6e 66 69 | 67 22 3a 20 3d c3 a4 74 |. "confi|g": =..t|
|00000080| 63 70 69 70 75 73 65 72 | 5f 63 6f 6e 66 69 67 28 |cpipuser|_config(|
|00000090| 61 72 67 24 29 0d 00 64 | 10 c9 20 22 75 70 67 72 |arg$)..d|.. "upgr|
|000000a0| 61 64 65 22 3a 0d 00 65 | 28 20 20 f4 20 41 6c 6c |ade":..e|(  . All|
|000000b0| 20 75 73 65 72 27 73 20 | 73 74 75 66 66 20 2d 20 | user's |stuff - |
|000000c0| 6e 6f 74 68 69 6e 67 20 | 74 6f 20 64 6f 0d 00 96 |nothing |to do...|
|000000d0| 0a 20 20 3d 22 31 22 0d | 00 a0 05 cb 0d 00 aa 07 |.  ="1".|........|
|000000e0| 3d 22 22 0d 00 b4 04 0d | 00 be 1d dd 20 a4 74 63 |="".....|.... .tc|
|000000f0| 70 69 70 75 73 65 72 5f | 63 6f 6e 66 69 67 28 64 |pipuser_|config(d|
|00000100| 69 72 24 29 0d 00 c8 0e | ea 20 69 25 2c 6c 69 6e |ir$)....|. i%,lin|
|00000110| 65 24 0d 00 d2 25 f2 74 | 63 70 69 70 75 73 65 72 |e$...%.t|cpipuser|
|00000120| 5f 75 70 64 61 74 65 28 | 64 69 72 24 2b 22 2e 43 |_update(|dir$+".C|
|00000130| 6f 6e 66 69 67 22 29 0d | 00 dc 28 69 25 3d a4 64 |onfig").|..(i%=.d|
|00000140| 6c 67 5f 70 6f 6c 6c 3a | 20 e7 20 69 25 3c 3e 64 |lg_poll:| . i%<>d|
|00000150| 6c 67 5f 4e 55 4c 4c 20 | 8c 20 3d 69 25 3d 31 0d |lg_NULL |. =i%=1.|
|00000160| 00 e6 27 f2 74 63 70 69 | 70 75 73 65 72 5f 75 70 |..'.tcpi|puser_up|
|00000170| 64 61 74 65 28 64 69 72 | 24 2b 22 2e 41 75 74 6f |date(dir|$+".Auto|
|00000180| 45 78 65 63 22 29 0d 00 | f0 28 69 25 3d a4 64 6c |Exec")..|.(i%=.dl|
|00000190| 67 5f 70 6f 6c 6c 3a 20 | e7 20 69 25 3c 3e 64 6c |g_poll: |. i%<>dl|
|000001a0| 67 5f 4e 55 4c 4c 20 8c | 20 3d 69 25 3d 31 0d 00 |g_NULL .| =i%=1..|
|000001b0| fa 29 f2 75 70 64 61 74 | 65 5f 6f 70 65 6e 28 64 |.).updat|e_open(d|
|000001c0| 69 72 24 2b 22 2e 52 65 | 73 6f 6c 76 65 2e 72 65 |ir$+".Re|solve.re|
|000001d0| 73 63 6f 6e 66 22 29 0d | 01 04 32 f2 75 70 64 61 |sconf").|..2.upda|
|000001e0| 74 65 5f 77 72 69 74 65 | 28 22 6e 61 6d 65 73 65 |te_write|("namese|
|000001f0| 72 76 65 72 20 22 2b 6e | 65 74 5f 6e 61 6d 65 5f |rver "+n|et_name_|
|00000200| 73 65 72 76 65 72 31 24 | 29 0d 01 0e 49 e7 20 6e |server1$|)...I. n|
|00000210| 65 74 5f 6e 61 6d 65 5f | 73 65 72 76 65 72 32 24 |et_name_|server2$|
|00000220| 3e 22 22 20 f2 75 70 64 | 61 74 65 5f 77 72 69 74 |>"" .upd|ate_writ|
|00000230| 65 28 22 6e 61 6d 65 73 | 65 72 76 65 72 20 22 2b |e("names|erver "+|
|00000240| 6e 65 74 5f 6e 61 6d 65 | 5f 73 65 72 76 65 72 32 |net_name|_server2|
|00000250| 24 29 0d 01 18 49 e7 20 | 6e 65 74 5f 6e 61 6d 65 |$)...I. |net_name|
|00000260| 5f 73 65 72 76 65 72 33 | 24 3e 22 22 20 f2 75 70 |_server3|$>"" .up|
|00000270| 64 61 74 65 5f 77 72 69 | 74 65 28 22 6e 61 6d 65 |date_wri|te("name|
|00000280| 73 65 72 76 65 72 20 22 | 2b 6e 65 74 5f 6e 61 6d |server "|+net_nam|
|00000290| 65 5f 73 65 72 76 65 72 | 33 24 29 0d 01 22 1a c8 |e_server|3$).."..|
|000002a0| 95 20 a4 75 70 64 61 74 | 65 5f 72 65 61 64 28 6c |. .updat|e_read(l|
|000002b0| 69 6e 65 24 29 0d 01 2c | 32 20 20 e7 20 c0 6c 69 |ine$)..,|2  . .li|
|000002c0| 6e 65 24 2c 36 29 3d 22 | 64 6f 6d 61 69 6e 22 20 |ne$,6)="|domain" |
|000002d0| 6c 69 6e 65 24 3d 22 64 | 6f 6d 61 69 6e 20 7b 64 |line$="d|omain {d|
|000002e0| 6f 6d 61 69 6e 7d 22 0d | 01 36 35 20 20 e7 20 c0 |omain}".|.65  . .|
|000002f0| 6c 69 6e 65 24 2c 31 30 | 29 3c 3e 22 6e 61 6d 65 |line$,10|)<>"name|
|00000300| 73 65 72 76 65 72 22 20 | f2 75 70 64 61 74 65 5f |server" |.update_|
|00000310| 77 72 69 74 65 28 6c 69 | 6e 65 24 29 0d 01 40 05 |write(li|ne$)..@.|
|00000320| ce 0d 01 4a 11 f2 75 70 | 64 61 74 65 5f 63 6c 6f |...J..up|date_clo|
|00000330| 73 65 0d 01 54 06 3d 31 | 0d 01 5e 04 0d 01 68 1e |se..T.=1|..^...h.|
|00000340| dd 20 f2 74 63 70 69 70 | 75 73 65 72 5f 75 70 64 |. .tcpip|user_upd|
|00000350| 61 74 65 28 66 69 6c 65 | 24 29 0d 01 72 1a ea 20 |ate(file|$)..r.. |
|00000360| 77 24 28 29 2c 6c 69 6e | 65 24 3a 20 de 20 77 24 |w$(),lin|e$: . w$|
|00000370| 28 31 30 29 0d 01 7c 17 | f2 75 70 64 61 74 65 5f |(10)..|.|.update_|
|00000380| 6f 70 65 6e 28 66 69 6c | 65 24 29 0d 01 86 1a c8 |open(fil|e$).....|
|00000390| 95 20 a4 75 70 64 61 74 | 65 5f 72 65 61 64 28 6c |. .updat|e_read(l|
|000003a0| 69 6e 65 24 29 0d 01 90 | 26 20 20 f2 74 63 70 69 |ine$)...|&  .tcpi|
|000003b0| 70 75 73 65 72 5f 77 6f | 72 64 73 70 6c 69 74 28 |puser_wo|rdsplit(|
|000003c0| 6c 69 6e 65 24 2c 77 24 | 28 29 29 0d 01 9a 1a 20 |line$,w$|()).... |
|000003d0| 20 c8 8e 20 77 24 28 31 | 29 2b 22 20 22 2b 77 24 | .. w$(1|)+" "+w$|
|000003e0| 28 32 29 20 ca 0d 01 a4 | 36 20 20 c9 20 22 73 65 |(2) ....|6  . "se|
|000003f0| 74 20 6e 6f 64 65 22 3a | 20 6c 69 6e 65 24 3d 22 |t node":| line$="|
|00000400| 73 65 74 20 6e 6f 64 65 | 20 22 22 22 2b 6e 65 74 |set node| """+net|
|00000410| 5f 6e 6f 64 65 24 2b 22 | 22 22 22 0d 01 ae 25 20 |_node$+"|"""...% |
|00000420| 20 c9 20 22 73 65 74 20 | 69 70 5f 61 64 64 72 22 | . "set |ip_addr"|
|00000430| 2c 22 23 73 65 74 20 69 | 70 5f 61 64 64 72 22 3a |,"#set i|p_addr":|
|00000440| 0d 01 b8 1c 20 20 20 20 | e7 20 6e 65 74 5f 66 69 |....    |. net_fi|
|00000450| 78 65 64 5f 69 70 24 3e | 22 22 20 8c 0d 01 c2 35 |xed_ip$>|"" ....5|
|00000460| 20 20 20 20 20 20 6c 69 | 6e 65 24 3d 22 73 65 74 |      li|ne$="set|
|00000470| 20 69 70 5f 61 64 64 72 | 20 22 22 22 2b 6e 65 74 | ip_addr| """+net|
|00000480| 5f 69 70 5f 61 64 64 72 | 65 73 73 24 2b 22 22 22 |_ip_addr|ess$+"""|
|00000490| 22 0d 01 cc 09 20 20 20 | 20 cc 0d 01 d6 1e 20 20 |"....   | .....  |
|000004a0| 20 20 20 20 6c 69 6e 65 | 24 3d 22 23 73 65 74 20 |    line|$="#set |
|000004b0| 69 70 5f 61 64 64 72 22 | 0d 01 e0 09 20 20 20 20 |ip_addr"|....    |
|000004c0| cd 0d 01 ea 3c 20 20 c9 | 20 22 73 65 74 20 64 6f |....<  .| "set do|
|000004d0| 6d 61 69 6e 22 3a 20 6c | 69 6e 65 24 3d 22 73 65 |main": l|ine$="se|
|000004e0| 74 20 64 6f 6d 61 69 6e | 20 22 22 22 2b 6e 65 74 |t domain| """+net|
|000004f0| 5f 64 6f 6d 61 69 6e 24 | 2b 22 22 22 22 0d 01 f4 |_domain$|+""""...|
|00000500| 46 20 20 c9 20 22 73 65 | 74 20 68 6f 73 74 22 3a |F  . "se|t host":|
|00000510| 20 6c 69 6e 65 24 3d 22 | 73 65 74 20 68 6f 73 74 | line$="|set host|
|00000520| 20 22 22 22 2b 6e 65 74 | 5f 6e 6f 64 65 24 2b 22 | """+net|_node$+"|
|00000530| 2e 22 2b 6e 65 74 5f 64 | 6f 6d 61 69 6e 24 2b 22 |."+net_d|omain$+"|
|00000540| 22 22 22 0d 01 fe 32 20 | 20 c9 20 22 68 6f 73 74 |"""...2 | . "host|
|00000550| 6e 61 6d 65 20 22 2b 77 | 24 28 32 29 3a 20 6c 69 |name "+w|$(2): li|
|00000560| 6e 65 24 3d 22 68 6f 73 | 74 6e 61 6d 65 20 7b 68 |ne$="hos|tname {h|
|00000570| 6f 73 74 7d 22 0d 02 08 | 60 20 20 c9 20 22 61 74 |ost}"...|`  . "at|
|00000580| 74 61 63 68 20 61 73 79 | 22 3a 20 6c 69 6e 65 24 |tach asy|": line$|
|00000590| 3d 22 61 74 74 61 63 68 | 20 61 73 79 20 22 2b 6e |="attach| asy "+n|
|000005a0| 65 74 5f 6d 6f 64 65 6d | 5f 64 72 69 76 65 72 24 |et_modem|_driver$|
|000005b0| 2b 22 20 22 2b 6e 65 74 | 5f 70 6f 72 74 24 2b 22 |+" "+net|_port$+"|
|000005c0| 20 73 6c 69 70 20 73 6c | 30 20 32 30 34 38 20 35 | slip sl|0 2048 5|
|000005d0| 37 36 20 30 22 0d 02 12 | 46 20 20 c9 20 22 72 6f |76 0"...|F  . "ro|
|000005e0| 75 74 65 20 61 64 64 22 | 3a 20 6c 69 6e 65 24 3d |ute add"|: line$=|
|000005f0| 22 72 6f 75 74 65 20 61 | 64 64 20 64 65 66 61 75 |"route a|dd defau|
|00000600| 6c 74 20 73 6c 30 20 5b | 22 2b 6e 65 74 5f 72 6f |lt sl0 [|"+net_ro|
|00000610| 75 74 65 72 24 2b 22 5d | 20 31 22 0d 02 1c 04 0d |uter$+"]| 1".....|
|00000620| 02 26 3f 20 20 c9 20 22 | 73 6d 74 70 20 67 61 74 |.&?  . "|smtp gat|
|00000630| 65 77 61 79 22 3a 20 6c | 69 6e 65 24 3d 22 73 6d |eway": l|ine$="sm|
|00000640| 74 70 20 67 61 74 65 77 | 61 79 20 22 2b 6e 65 74 |tp gatew|ay "+net|
|00000650| 5f 73 6d 74 70 5f 67 61 | 74 65 77 61 79 24 0d 02 |_smtp_ga|teway$..|
|00000660| 30 3c 20 20 c9 20 22 74 | 69 6d 65 20 73 65 72 76 |0<  . "t|ime serv|
|00000670| 65 72 22 3a 20 6c 69 6e | 65 24 3d 22 74 69 6d 65 |er": lin|e$="time|
|00000680| 20 73 65 72 76 65 72 20 | 22 2b 6e 65 74 5f 74 69 | server |"+net_ti|
|00000690| 6d 65 5f 73 65 72 76 65 | 72 24 0d 02 3a 56 20 20 |me_serve|r$..:V  |
|000006a0| c9 20 22 6e 6e 74 70 20 | 61 64 64 73 65 72 76 65 |. "nntp |addserve|
|000006b0| 72 22 3a 20 6c 69 6e 65 | 24 3d 22 6e 6e 74 70 20 |r": line|$="nntp |
|000006c0| 61 64 64 73 65 72 76 65 | 72 20 22 2b 6e 65 74 5f |addserve|r "+net_|
|000006d0| 6e 6e 74 70 5f 73 65 72 | 76 65 72 24 2b 22 20 22 |nntp_ser|ver$+" "|
|000006e0| 2b 77 24 28 34 29 2b 22 | 20 22 2b 77 24 28 35 29 |+w$(4)+"| "+w$(5)|
|000006f0| 0d 02 44 07 20 20 cb 0d | 02 4e 1a 20 20 f2 75 70 |..D.  ..|.N.  .up|
|00000700| 64 61 74 65 5f 77 72 69 | 74 65 28 6c 69 6e 65 24 |date_wri|te(line$|
|00000710| 29 0d 02 58 05 ce 0d 02 | 62 11 f2 75 70 64 61 74 |)..X....|b..updat|
|00000720| 65 5f 63 6c 6f 73 65 0d | 02 6c 05 e1 0d 02 76 04 |e_close.|.l....v.|
|00000730| 0d 02 80 28 dd 20 f2 74 | 63 70 69 70 75 73 65 72 |...(. .t|cpipuser|
|00000740| 5f 77 6f 72 64 73 70 6c | 69 74 28 6c 69 6e 65 24 |_wordspl|it(line$|
|00000750| 2c f8 20 77 24 28 29 29 | 0d 02 8a 0e ea 20 69 25 |,. w$())|..... i%|
|00000760| 2c 63 25 2c 6e 25 0d 02 | 94 13 e3 20 69 25 3d 31 |,c%,n%..|... i%=1|
|00000770| 20 b8 20 a9 6c 69 6e 65 | 24 0d 02 9e 15 20 63 25 | . .line|$.... c%|
|00000780| 3d 97 c1 6c 69 6e 65 24 | 2c 69 25 2c 31 29 0d 02 |=..line$|,i%,1)..|
|00000790| a8 2b 20 e7 20 63 25 3e | 39 36 20 80 20 63 25 3c |.+ . c%>|96 . c%<|
|000007a0| 31 32 33 20 c1 6c 69 6e | 65 24 2c 69 25 2c 31 29 |123 .lin|e$,i%,1)|
|000007b0| 3d bd 28 63 25 2d 33 32 | 29 0d 02 b2 05 ed 0d 02 |=.(c%-32|).......|
|000007c0| bc 08 6e 25 3d 30 0d 02 | c6 05 f5 0d 02 d0 0b 20 |..n%=0..|....... |
|000007d0| 20 6e 25 2b 3d 31 0d 02 | da 1f 20 20 77 24 28 6e | n%+=1..|..  w$(n|
|000007e0| 25 29 3d a4 73 74 72 74 | 6f 6b 28 6c 69 6e 65 24 |%)=.strt|ok(line$|
|000007f0| 2c 22 20 22 29 0d 02 e4 | 16 fd 20 6c 69 6e 65 24 |," ")...|.. line$|
|00000800| 3d 22 22 20 84 20 6e 25 | 3d 31 30 0d 02 ee 05 e1 |="" . n%|=10.....|
|00000810| 0d ff                   |                         |..      |        |
+--------+-------------------------+-------------------------+--------+--------+